object frm_Devices: Tfrm_Devices
  Left = 486
  Top = 13
  Width = 1024
  Height = 768
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = #35774#22791#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000000020000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    00000000000000000000000000000000000000BFBFBFBFBFBFBFB00000000000
    000030FBFBF00000FBFBF00000000000000330BFBFBFBFBFBFBFB00000000000
    003330FBFBF00000FBFBF00000000000033330BFBFB0FFF0BFBFB00000000000
    333330FBF33000003333300000000003333330BFB33333333333300000000003
    333330FBF00000000000000000000003333330BF00BFBFBFBFBFBFBF00000003
    333330F080FBFBF00000FBFB000000033333300880BFBFBFBFBFBFBF00000003
    3333308880FBFBF00000FBFB000000033333308880BFBFB0FFF0BFBF00000003
    3333308880FBFBF00000FBFB000000033333308880BFBFBFBFBFBFBF00000003
    3333308880FBFBFBFBFBFBFB0000000333333088800000000000000000000003
    333330880FFFFFFFFFFFFFF00000000333333080780000000000870000000003
    3333300FFFFFFFFFFFFFF0000000000333333078000000000087000000000003
    333330FFFFFFFFFFFFF000000000000333330000000000000000000000000003
    33300BFBFBFBFBFBFBFB0000000000033300BFBFBFBFBFBFBFB0000000000003
    300BFBFBFBFBFBFBFB0000000000000300BFBFBFBFBFBFBFB000000000000000
    0BFBFBFBFBFBFBFB0000000000000000BFBFBFBFBFBFBFB00000000000000000
    000000000000000000000000000000000000000000000000000000000000FF80
    003FFF00003FFE00003FFC00003FF800003FF000003FE000003FC000003FC000
    0007C0000007C0000007C0000007C0000007C0000007C0000007C0000007C000
    0007C0000007C000000FC000001FC000003FC000003FC000003FC000003FC000
    007FC00000FFC00001FFC00003FFC00007FFC0000FFFC0001FFFFFFFFFFF}
  OldCreateOrder = False
  Position = poDefault
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 273
    Height = 741
    Align = alLeft
    Caption = #35774#22791#20449#24687#21015#34920
    TabOrder = 0
    object Panel1: TPanel
      Left = 2
      Top = 15
      Width = 269
      Height = 724
      Align = alClient
      TabOrder = 0
      object Panel4: TPanel
        Left = 1
        Top = 662
        Width = 267
        Height = 61
        Align = alBottom
        BevelInner = bvLowered
        TabOrder = 4
        object Label24: TLabel
          Left = 35
          Top = 41
          Width = 197
          Height = 13
          AutoSize = False
          Caption = #9733#25552#31034#65306#19981#22635#26102#34920#31034#26597#35810#20840#37096#9733
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object edtAddress: TEdit
          Left = 12
          Top = 13
          Width = 181
          Height = 20
          Hint = #19981#36755#20837#20219#20309#20449#24687#28857#20987#12304#26597#35810#12305#26174#31034#25152#26377#35760#24405#12290
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 1
          Text = #35831#22312#36825#37324#36755#20837#35774#22791#30340#22320#22336'...'
          OnClick = edtAddressClick
          OnEnter = edtAddressEnter
          OnExit = edtAddressExit
        end
        object btnSearch: TButton
          Left = 200
          Top = 10
          Width = 59
          Height = 25
          Caption = #26597#35810
          Default = True
          TabOrder = 0
          OnClick = btnSearchClick
        end
      end
      object gbDevices: TGroupBox
        Left = 1
        Top = 197
        Width = 267
        Height = 167
        Align = alBottom
        Enabled = False
        TabOrder = 1
        object Label1: TLabel
          Left = 17
          Top = 27
          Width = 62
          Height = 13
          AutoSize = False
          Caption = #35774#22791#31867#22411#65306
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label2: TLabel
          Left = 15
          Top = 59
          Width = 60
          Height = 13
          AutoSize = False
          Caption = #22320'    '#22336#65306
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Label3: TLabel
          Left = 15
          Top = 91
          Width = 60
          Height = 13
          AutoSize = False
          Caption = #22791'    '#27880#65306
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object cmbDeviceType: TDBComboBox
          Left = 89
          Top = 27
          Width = 152
          Height = 21
          Style = csDropDownList
          DataField = #35774#22791#31867#22411
          DataSource = dsDevices
          ItemHeight = 13
          Items.Strings = (
            #20809#20132#25509#31665
            'ODF'#37197#32447#26550)
          TabOrder = 0
        end
        object edtDeviceAddress: TDBEdit
          Left = 88
          Top = 59
          Width = 153
          Height = 21
          DataField = #22320#22336
          DataSource = dsDevices
          TabOrder = 1
        end
        object memRemark: TDBMemo
          Left = 88
          Top = 91
          Width = 153
          Height = 62
          DataField = #22791#27880
          DataSource = dsDevices
          ScrollBars = ssVertical
          TabOrder = 2
        end
      end
      object dbnDevices: TDBNavigator
        Left = 1
        Top = 364
        Width = 267
        Height = 25
        DataSource = dsDevices
        VisibleButtons = [nbInsert, nbDelete, nbEdit]
        Align = alBottom
        Hints.Strings = (
          #39318#35760#24405
          #19978#19968#35760#24405
          #19979#19968#35760#24405
          #26411#35760#24405
          #25554#20837#35760#24405
          #21024#38500#35760#24405
          #32534#36753#35760#24405
          #20445#23384
          #21462#28040
          #21047#26032)
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        BeforeAction = dbnDevicesBeforeAction
        OnClick = dbnDevicesClick
      end
      object GroupBox4: TGroupBox
        Left = 1
        Top = 389
        Width = 267
        Height = 273
        Align = alBottom
        Caption = #35774#22791#21333#20803
        TabOrder = 3
        object dbnUnits: TDBNavigator
          Left = 2
          Top = 246
          Width = 263
          Height = 25
          DataSource = dsUnits
          VisibleButtons = [nbInsert, nbDelete]
          Align = alBottom
          Hints.Strings = (
            #39318#35760#24405
            #19978#19968#35760#24405
            #19979#19968#35760#24405
            #26411#35760#24405
            #25554#20837#35760#24405
            #21024#38500#35760#24405
            #32534#36753#35760#24405
            #20445#23384
            #21462#28040
            #21047#26032)
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          BeforeAction = dbnUnitsBeforeAction
          OnClick = dbnUnitsClick
        end
        object panUnitDetail: TPanel
          Left = 2
          Top = 162
          Width = 263
          Height = 84
          Align = alBottom
          Enabled = False
          TabOrder = 2
          object Label4: TLabel
            Left = 14
            Top = 16
            Width = 65
            Height = 13
            Caption = #21333#20803#32534#21495#65306
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
          end
          object Label5: TLabel
            Left = 26
            Top = 48
            Width = 52
            Height = 13
            Caption = #31471#21475#25968#65306
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
          end
          object DBEdit1: TDBEdit
            Left = 80
            Top = 16
            Width = 49
            Height = 21
            DataField = #21333#20803#32534#21495
            DataSource = dsUnits
            MaxLength = 2
            TabOrder = 0
          end
          object DBComboBox1: TDBComboBox
            Left = 80
            Top = 48
            Width = 145
            Height = 21
            Style = csDropDownList
            DataField = #31471#21475#25968
            DataSource = dsUnits
            ItemHeight = 13
            Items.Strings = (
              '12'
              '24'
              '48'
              '60'
              '72'
              '84'
              '96'
              '108'
              '144'
              '168'
              '204'
              '288')
            TabOrder = 1
          end
        end
        object Panel2: TPanel
          Left = 2
          Top = 15
          Width = 263
          Height = 42
          Align = alTop
          BevelOuter = bvNone
          TabOrder = 0
          object Label6: TLabel
            Left = 8
            Top = 6
            Width = 89
            Height = 13
            AutoSize = False
            Caption = #25152#36873#35774#22791#22320#22336#65306
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
          end
          object labAddress: TLabel
            Left = 8
            Top = 24
            Width = 249
            Height = 12
            AutoSize = False
            Font.Charset = GB2312_CHARSET
            Font.Color = clRed
            Font.Height = -12
            Font.Name = #23435#20307
            Font.Style = [fsBold]
            ParentFont = False
          end
        end
        object dbgUnits: TNewDBGrid
          Left = 2
          Top = 57
          Width = 263
          Height = 105
          Hint = #40736#26631#21333#20987#30456#24212#30340#35760#24405#65292#21491#20391#20250#26174#31034#20986#20854#31471#21475#20351#29992#24773#20917#12290
          Align = alClient
          DataSource = dsUnits
          Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
          ParentShowHint = False
          ReadOnly = True
          ShowHint = True
          TabOrder = 1
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnCellClick = dbgUnitsCellClick
          OnDrawColumnCell = dbgUnitsDrawColumnCell
          WZebra = True
          WFirstColor = clSkyBlue
          WSecondColor = clMoneyGreen
          Columns = <
            item
              Expanded = False
              FieldName = #21333#20803#32534#21495
              Title.Alignment = taCenter
              Width = 55
              Visible = True
            end
            item
              Expanded = False
              FieldName = #31471#21475#25968
              Title.Alignment = taCenter
              Width = 60
              Visible = True
            end>
        end
      end
      object Panel5: TPanel
        Left = 1
        Top = 1
        Width = 267
        Height = 196
        Align = alClient
        Caption = 'Panel5'
        TabOrder = 0
        object dbgDevices: TNewDBGrid
          Left = 1
          Top = 1
          Width = 265
          Height = 194
          Hint = #40736#26631#21333#20987#30456#24212#30340#35760#24405#65292#21491#20391#20250#26174#31034#20986#20854#31471#21475#20351#29992#24773#20917#12290
          Align = alClient
          DataSource = dsDevices
          Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
          ParentShowHint = False
          ReadOnly = True
          ShowHint = True
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          OnCellClick = dbgDevicesCellClick
          OnDrawColumnCell = dbgDevicesDrawColumnCell
          WZebra = True
          WFirstColor = clSkyBlue
          WSecondColor = clMoneyGreen
          Columns = <
            item
              Expanded = False
              FieldName = #22320#22336
              Width = 150
              Visible = True
            end
            item
              Expanded = False
              FieldName = #35774#22791#31867#22411
              Width = 65
              Visible = True
            end>
        end
      end
    end
  end
  object GroupBox2: TGroupBox
    Left = 273
    Top = 0
    Width = 743
    Height = 741
    Align = alClient
    Caption = #31471#21475#20351#29992#24773#20917
    TabOrder = 1
    object Image1: TImage
      Left = 136
      Top = 280
      Width = 41
      Height = 41
      Picture.Data = {
        055449636F6E0000010001002020100000000000E80200001600000028000000
        2000000040000000010004000000000080020000000000000000000000000000
        0000000000000000000080000080000000808000800000008000800080800000
        C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000
        FFFFFF0000000000000000000000000000770000000000000000000000000000
        07700660000000000000000000000000770063F0000000000000000000000007
        70063F600000000000000000000000770063F600000000000000000000000770
        063F600000000000000000000000770063F60000000000000000000000077006
        3F600000000000000777777000770063F600000000000007777777777777063F
        60000000000007700000000877700FF600000000000070070000007008036000
        0000000000070700777777007006F0000000000000700077EEEEEE7700000000
        00000000000077EEFFFFFFEE70008700000000000070EEE7666677FEE7070700
        000000000007EE7E7776667FEE70087000000000070EEEEEEEEE7667FE707070
        00000000007EEEFEEEEEE7667FE7007000000000007EFFEEEEEEEE767FE70070
        00000000007EEFFEEEEEEEE66FE7007000000000007EFFEEEFEEEEE76FE70070
        00000000007EEFFEEEFFEEE76FE70070000000000077EFFFFEEEEEE76FE70000
        000000000707EEFFFEFEEEEE7EE070000000000000077EEFFFFFFEE7EE800000
        00000000007077EEFFEFEFEEE7070000000000000000077EEEFEEEE777000000
        00000000000000777EEEE7770000000000000000000007007777770070000000
        0000000000000007000000700000000000000000000000000000000000000000
        00000000FFFFFFC1FFFFFF80FFFFFF00FFFFFE00FFFFFC01FFFFF803FFFFF007
        FFFFE00FFF81C01FFE00003FF800007FF00000FFE00003FFC00007FFC00003FF
        800003FF800001FF000001FF000001FF000001FF000001FF000001FF000001FF
        000003FF000003FF800007FF800007FFC0000FFFE0001FFFF0003FFFF8007FFF
        FE01FFFF}
      Visible = False
    end
    object sgDevicePort: TStringGrid
      Left = 2
      Top = 49
      Width = 739
      Height = 476
      Align = alClient
      Color = clSilver
      ColCount = 13
      DefaultColWidth = 80
      DefaultRowHeight = 80
      RowCount = 2
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected]
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = sgDevicePortClick
      OnDblClick = sgDevicePortDblClick
      OnDrawCell = sgDevicePortDrawCell
      OnSelectCell = sgDevicePortSelectCell
      ColWidths = (
        80
        80
        80
        80
        80
        80
        80
        80
        80
        80
        80
        80
        80)
    end
    object gbDevicePortDetail: TGroupBox
      Left = 2
      Top = 525
      Width = 739
      Height = 214
      Align = alBottom
      Caption = #25152#25509#20809#32518#20449#24687#12304#36824#26410#36873#23450#31471#21475#12305
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      object labHeaderAddress: TLabel
        Left = 27
        Top = 32
        Width = 374
        Height = 12
        AutoSize = False
        Caption = #20809#32518#22987#31471#22320#22336#65306
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        WordWrap = True
      end
      object labTailAddress: TLabel
        Left = 27
        Top = 59
        Width = 374
        Height = 12
        AutoSize = False
        Caption = #20809#32518#26411#31471#22320#22336#65306
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        WordWrap = True
      end
      object labOFNum: TLabel
        Left = 53
        Top = 113
        Width = 102
        Height = 13
        AutoSize = False
        Caption = #20809#32420#24207#21495#65306
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        WordWrap = True
      end
      object labBusiness: TLabel
        Left = 416
        Top = 59
        Width = 313
        Height = 12
        AutoSize = False
        Caption = #19994#21153#21517#31216#65306
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        WordWrap = True
      end
      object labRemark: TLabel
        Left = 414
        Top = 113
        Width = 287
        Height = 40
        AutoSize = False
        Caption = #22791'    '#27880#65306
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        WordWrap = True
      end
      object labOCTailNum: TLabel
        Left = 79
        Top = 86
        Width = 102
        Height = 13
        AutoSize = False
        Caption = #33455#25968#65306
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        WordWrap = True
      end
      object labRoute: TLabel
        Left = 416
        Top = 86
        Width = 313
        Height = 13
        AutoSize = False
        Caption = #36335#30001#39034#24207#65306
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        WordWrap = True
      end
      object labStatus: TLabel
        Left = 79
        Top = 141
        Width = 322
        Height = 13
        AutoSize = False
        Caption = #29366#24577#65306
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        WordWrap = True
      end
      object labPortingStatus: TLabel
        Left = 415
        Top = 32
        Width = 315
        Height = 13
        AutoSize = False
        Caption = #25104#31471#24773#20917#65306
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        WordWrap = True
      end
      object btnSelect: TButton
        Left = 424
        Top = 164
        Width = 97
        Height = 41
        Caption = #30830#23450
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        Visible = False
        OnClick = btnSelectClick
      end
      object btnCancel: TButton
        Left = 529
        Top = 164
        Width = 97
        Height = 41
        Caption = #21462#28040
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 1
        Visible = False
        OnClick = btnCancelClick
      end
      object panFree: TPanel
        Left = 23
        Top = 176
        Width = 170
        Height = 25
        Color = clLime
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 3
      end
      object panOccupy: TPanel
        Left = 223
        Top = 176
        Width = 170
        Height = 25
        Color = clYellow
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 4
      end
      object btnClear: TButton
        Left = 633
        Top = 164
        Width = 97
        Height = 41
        Caption = #28165#38500
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 2
        Visible = False
        OnClick = btnClearClick
      end
    end
    object Panel3: TPanel
      Left = 2
      Top = 15
      Width = 739
      Height = 34
      Align = alTop
      BevelInner = bvLowered
      BorderWidth = 2
      Color = clMoneyGreen
      TabOrder = 0
      object Label7: TLabel
        Left = 8
        Top = 8
        Width = 89
        Height = 13
        AutoSize = False
        Caption = #25152#36873#35774#22791#22320#22336#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object labSelectedAddress: TLabel
        Left = 104
        Top = 8
        Width = 233
        Height = 13
        AutoSize = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label8: TLabel
        Left = 352
        Top = 8
        Width = 89
        Height = 13
        AutoSize = False
        Caption = #25152#36873#35774#22791#21333#20803#65306
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
      object labSelectedUnit: TLabel
        Left = 448
        Top = 8
        Width = 273
        Height = 13
        AutoSize = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
      end
    end
  end
  object dsDevices: TDataSource
    DataSet = DM.dsDevices
    Left = 16
    Top = 32
  end
  object dsUnits: TDataSource
    DataSet = DM.dsUnit
    Left = 18
    Top = 473
  end
end
